home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / Util / Archiver / Install < prev    next >
Text File  |  1995-11-24  |  3KB  |  139 lines
  1. (if (= @language "deutsch")
  2.     (
  3.         (SET Intro "Wilkommen.. ")
  4.         (SET archiver "Welche der folgenden (Ent)Packer wollen sie installieren ?")
  5.         (SET Where      "Wohin sollen die von ihnen gewählten (Ent)Packer hinkopiert werden ?")
  6.     )
  7. )
  8.  
  9. (if (= @language "english")
  10.     (
  11.         (SET Intro  "Welcome.. ")
  12.         (SET archiver  "Which of the following (de)archivers do you like to install ?")
  13.         (SET Where       "Where should be the choosen (de)archivers be placed ?")
  14.     )
  15. )
  16.  
  17.  
  18. (SET PROC (database "cpu"))
  19.  
  20.  
  21. (SET Arch
  22.     (ASKOPTIONS
  23.         (PROMPT archiver)
  24.         (HELP   "")
  25.         (CHOICES
  26.             "Lha"
  27.             "Zoo"
  28.             "GZip"
  29.             "GnuTar"
  30.             "UnSit"
  31.             "UnZip"
  32.             "UnArj"
  33.             "Zip"
  34.             "ZipSplit"
  35.             "ZipNote"
  36.         )
  37.     )
  38. )
  39.  
  40. (SET BinDest
  41.     (ASKDIR
  42.         (PROMPT Where)
  43.         (HELP   "")
  44.         (DEFAULT "c:")
  45.     )
  46. )
  47.  
  48. (if (BITAND Arch 1)
  49.     (COPYFILES
  50.         (SOURCE ":Util/Archiver/Lha/LhA/LhA")
  51.         (DEST   BinDest)
  52.     )
  53. )
  54.  
  55. (if (BITAND Arch 2)
  56.     (COPYFILES
  57.         (SOURCE ":Util/Archiver/Zoo/zoo/zoo")
  58.         (DEST   BinDest)
  59.     )
  60. )
  61.  
  62. (if (BITAND Arch 4)
  63.     (COPYFILES
  64.         (SOURCE ":Util/Archiver/GZip/GNU/bin/gzip")
  65.         (DEST   BinDest)
  66.     )
  67. )
  68.  
  69. (if (BITAND Arch 8)
  70.     (COPYFILES
  71.         (SOURCE ":Util/Archiver/GNUTar/GNU/bin/tar")
  72.         (DEST   BinDest)
  73.     )
  74. )
  75.  
  76. (if (BITAND Arch 16)
  77.     (COPYFILES
  78.         (SOURCE ":Util/Archiver/UnSIT/unsit1.5c.amiga/bin/unsit")
  79.         (DEST   BinDest)
  80.     )
  81. )
  82.  
  83. (if (BITAND Arch 32)
  84.     (COPYFILES
  85.         (SOURCE ":Util/Archiver/UnZIP/unzip51x/UnZip")
  86.         (DEST   BinDest)
  87.     )
  88. )
  89.  
  90. (if (BITAND Arch 64)
  91.     (
  92.         (if (OR (= PROC "68000") (= PROC "68010"))
  93.             (COPYFILES
  94.                 (SOURCE ":Util/Archiver/UNArj/UnARJ/unarj")
  95.                 (DEST   BinDest)
  96.                 (NEWNAME "UnArj")
  97.             )
  98.         )
  99.  
  100.         (if (= PROC "68020")
  101.             (COPYFILES
  102.                 (SOURCE ":Util/Archiver/UNArj/UnArg/unarj.020")
  103.                 (DEST   BinDest)
  104.                 (NEWNAME "UnArj")
  105.             )
  106.         )
  107.  
  108.         (if (OR (= PROC "68030") (= PROC "68040") (= PROC "68060"))
  109.             (COPYFILES
  110.                 (SOURCE ":Util/Archiver/UNArj/UnArj/unarj.030")
  111.                 (DEST   BinDest)
  112.                 (NEWNAME "UnArj")
  113.             )
  114.         )
  115.  
  116.     )
  117. )
  118.  
  119. (if (BITAND Arch 128)
  120.     (COPYFILES
  121.         (SOURCE ":Util/Archiver/Zip/ZIP/Zip")
  122.         (DEST   BinDest)
  123.     )
  124. )
  125.  
  126. (if (BITAND Arch 256)
  127.     (COPYFILES
  128.         (SOURCE ":Util/Archiver/Zip/ZIP/ZipSplit")
  129.         (DEST   BinDest)
  130.     )
  131. )
  132.  
  133. (if (BITAND Arch 512)
  134.     (COPYFILES
  135.         (SOURCE ":Util/Archiver/Zip/ZIP/ZipNote")
  136.         (DEST   BinDest)
  137.     )
  138. )
  139.